The Guided Tour of Multimedia (Second Edition)/The Guided Tour of Multimedia (Second Edition).iso/trials/director/evalcopy/director.z/PHILANTH.DIR/00001_Script_1

Text File | 1994-05-25 | 3KB | 90 lines

-- Philanthropy Movie Scrip Rev 2
-- *********************************************************************
-- The startMovie handler is called automatically when the movie is started
on startMovie
  -- we use a special cursor that is stored as a cast member
  --set the mouseDownScript to "PhilOrgNameClick"
  set magcursor to [the number of cast "magnifying glass"]
  --  menu bar
  set the cursor of sprite 2 = magcursor
  -- Philanthropy name sprite
  set the cursor of sprite 3 = magcursor
end startMovie

-- *********************************************************************
-- The stopMovie handler is called automatically when the movie is stopped
on stopMovie
  -- since we are closing this movie, let's go back to the arrow cursor
  cursor (-1)
end stopMovie

-- *********************************************************************
-- Called when the user clicks the Designer Name Sprite (channel 3)
-- the handler determines the vertical position of the mouse and deduces the
-- designer name that was clicked. Then it moves the playback head to
-- the frame in the score that represents that designer.
on PhilOrgNameClick
  put the mouseV into VertPos
  if VertPos > 56 and  VertPos < 210 then
    if VertPos < 95 then
      --
      go "AIA"
    else
      if VertPos < 130 then
        --
        go "PBD"
      else
        if VertPos < 175 then
          --
          go "IBD"
        else
          if VertPos < 215 then
            --
            go "CDC"
          else
            --
            go "AIA"
          end if
        end if
      end if
    end if
  end if
end PhilOrgNameClick

-- *********************************************************************
-- Called when the user clicks the Menu Bar Sprite (channel 2)
-- the handler determines the horizontal position of the mouse and deduces the
-- menu item that was clicked. Then it calls the appropriate movie.
on bartender
  put the mouseH into HortPos
  if HortPos < 123 then
    -- furniture menu item clicked
    play movie "FURNITUR.DIR"
  else
    if HortPos < 273 then
      -- philanthropy menu item clicked
      play movie "PHILANTH.DIR"
    else
      if HortPos < 385 then
        -- learning menu item clicked
        play movie "LEARN.DIR"
      else
        if HortPos < 440 then
          -- luck menu item clicked
          play movie "LUCK.DIR"
        else
          -- help  menu item clicked
          play movie "HELP.DIR"
        end if
      end if
    end if
  end if
end bartender

-- *********************************************************************
-- Basic handler used when this moive is played in a window.
-- Provides a way to reset the movie.
on resetMovie
  play movie "Begin.DIR"
end resetMovie